home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 4 / FM Towns Free Software Collection 4 - Disc 1.iso / data / trau / trau.cfg < prev    next >
Text File  |  1991-10-18  |  17KB  |  708 lines
  1. /************************************************************************
  2. /*
  3. /*            ｽ-ﾊﾟ-･ﾘｱﾙ･ﾀｲﾑ･ｶﾗｰﾁｪﾝｼﾞ･ｶﾗｵｹ･ｼｽﾃﾑ
  4. /*                 超絶色変化歌詞表示機械
  5. /*                       ＡｙａＫＯＫ
  6. /*
  7. /*                  (C) Copyrihgt 1991 Aya
  8. /*
  9. /*                          No.1 
  10. /*              ..
  11. /*            Ｔｒａｕｍｅｒｅｉ  /  トロイメライ
  12. /*
  13. /*               Ｋinderszenen ｢子供の情景｣より
  14. /*
  15. /*                                      Robert Alexander Schumann,op.15-7
  16. /*
  17. /*               EUP&CFG file by Aya
  18. /*               Lyric by Sion
  19. /*
  20. /*               TABSISE = 4
  21. /*
  22. /************************************************************************
  23.  
  24. KARAOKE_start { 
  25.     wind_init()
  26.     he_parts(80,-1,-1)
  27.     he_parts(81,-1,-1)
  28.     tiff_load(KARA_TIF,0,24,0)
  29.     RET = ""
  30.     kok_next = 0;
  31.     col_next = 0;
  32.     l_next = 0;
  33.     S_YW = 27;
  34.     SW_FLG = 0;
  35.     col_bak = 0;
  36.     S_XB = 0;
  37.     S_YB = 0;
  38.     S_XWB = 0;
  39.     B_XB = 0;
  40.     B_XWB = 0;
  41.     wind_bac_color(C_HBLUE)
  42.     wind_size_set(0,360,470,70)
  43.     wind_open()
  44.     palette( 2, 160,224,112)
  45.     palette( 3,  96,160,224)
  46.     palette( 4, 176,224,128)
  47.     palette( 5, 160,160, 80)
  48.     palette( 6, 160,224, 96)
  49.     palette(10, 192,192,192)
  50.     palette(11, 176,192,240)
  51.     palette(12, 240,208,240)
  52.     palette(13, 224,240,224)
  53.     palette(14, 208,224,160)
  54. }
  55.  
  56. KARAOKE_end {
  57.     palette()
  58.     wind_close()
  59. }
  60.  
  61. KARAOKE {
  62.     TOTAL = MEAS;
  63.     mul ( "TOTAL", 384 )
  64.     add ( "TOTAL", CLOCK )
  65.     KOK()
  66.     CHGXY()
  67.     SWEEP()
  68.     if ( TOTAL > 12800 ) { SWEEP_2() }
  69.     expr("l_temp","\(TOTAL)-\(l_next)")
  70.     if ( l_temp < 0 ) { return (-1) }
  71.     switch_run ( TOTAL,     0,"LINE_1; l_next=384;",
  72.                           384,"LINE_2; l_next=12288;",
  73.                         12288,"LINE_3; l_next=12576;",
  74.                         12576,"LINE_4; l_next=12800;",
  75.                         12800,"LINE_5; l_next=99999;"
  76.                )
  77.     return (0)
  78. }
  79.  
  80. SWEEP {    /* by YAMA */
  81.     if ( SW_FLG = 0 ) { return (-1) }
  82.     expr("it1","\(col_next)-\(col_now)")
  83.     if ( it1 > 0 )
  84.         { expr("it2","\(TOTAL)-\(col_now)")
  85.         if ( it2 > 0 )
  86.             { S_X = S_XB; S_Y = S_YB; S_XW = S_XWB;
  87.               S_X2B = S_X;
  88.               expr("S_Y2","\(S_Y)+\(S_YW)")
  89.               col_bak = col_now; col_now = col_next; }
  90.         }
  91.     expr("S_X2","\(S_X)+\(S_XW)*(\(TOTAL)-\(col_bak))/(\(col_now)-\(col_bak))")
  92.     if ( S_X2 > 468 ) { S_X2 = 469; }
  93.     graph("boxf",S_X2B,S_Y,S_X2,S_Y2,AND,C_HMAGENTA )
  94.     S_X2B = S_X2;
  95. }
  96. SWEEP_2 {
  97.     if ( TOTAL > 12910 ) { return (-1) }
  98.     expr("it1","\(col_next)-\(col_now)")
  99.     if ( it1 > 0 )
  100.         { expr("it2","\(TOTAL)-\(col_now)")
  101.         if ( it2 > 0 )
  102.             { S_X = S_XB; S_Y = S_YB; S_XW = S_XWB;
  103.               S_X2B = S_X;
  104.               expr("S_Y2","\(S_Y)+\(S_YW)")
  105.               B_X = B_XB; B_XW = B_XWB;
  106.               B_X2B = B_X;
  107.               col_bak = col_now; col_now = col_next; }
  108.         }
  109.     expr("S_X2","\(S_X)+\(S_XW)*(\(TOTAL)-\(col_bak))/(\(col_now)-\(col_bak))")
  110.     if ( S_X2 > 468 ) { S_X2 = 469; }
  111.     expr("B_X2","\(B_X)+\(B_XW)*(\(TOTAL)-\(col_bak))/(\(col_now)-\(col_bak))")
  112.     if ( B_X2 < 1 ) { S_X2 = 0; }
  113.     graph("boxf",S_X2B,S_Y,S_X2,S_Y2,AND,C_HBLUE )
  114.     graph("boxf",B_X2B,S_Y,B_X2,S_Y2,AND,C_HBLUE )
  115.     }
  116.     S_X2B = S_X2;
  117.     B_X2B = B_X2;
  118. }
  119.  
  120. LINE_1 {
  121.     RET = "『子供の情景』作品１５第７曲目"
  122. }
  123. LINE_2 {
  124.     RET = "                              トロイメライ               R.A.ｼｭｰﾍﾞﾙﾄ作曲  "
  125. }
  126. LINE_3 {
  127.     RET = "                                                           EUP file By Aya"
  128. }
  129. LINE_4 {
  130.     RET = "                           『優しい瞬間』                  Lyric By Sion  "
  131. }
  132. LINE_5 {
  133.     RET = " "
  134. }
  135.  
  136. KOK {
  137.     expr("temp","\(TOTAL)-\(kok_next)")
  138.     if ( temp < 0 ) { return (-1) }
  139.     if ( TOTAL < 7008 )
  140.     {    switch_run( TOTAL,     0, "KOK_B01; kok_next=144;",
  141.                              144, "KOK_B02; kok_next=864;",
  142.                              864, "KOK_B03; kok_next=1632;",
  143.                             1632, "KOK_B04; kok_next=2064;",
  144.                             2064, "KOK_B05; kok_next=2928;",
  145.                             2928, "KOK_B06; kok_next=3936;",
  146.                             3936, "KOK_B07; kok_next=4704;",
  147.                             4704, "KOK_B08; kok_next=5424;",
  148.                             5424, "KOK_B09; kok_next=6288;",
  149.                             6288, "KOK_B10; kok_next=7008;"
  150.         )
  151.     } else
  152.     {    switch_run( TOTAL,  7008, "KOK_B11; kok_next=7824;",
  153.                             7824, "KOK_B12; kok_next=8544;",
  154.                             8544, "KOK_B13; kok_next=9360;",
  155.                             9360, "KOK_B14; kok_next=10080;",
  156.                            10080, "KOK_B15; kok_next=10848;",
  157.                            10848, "KOK_B16; kok_next=11568;",
  158.                            11568, "KOK_B17; kok_next=12700;",
  159.                            12700, "KOK_B18; kok_next=12740;",
  160.                            12740, "KOK_B19; kok_next=12910;",
  161.                            12910, "KOK_B20; kok_next=99999;"
  162.         )
  163.     }
  164. }
  165.  
  166. KOK_B01 {
  167.     graph("boxf",20,5,450,63,PSET,C_HBLUE)
  168.     graph("symbol",145,16,8,16,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,
  169.         " Ｔｒａｕｍｅｒｅｉ ")
  170.     graph("symbol",177,11,4,8,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,1,"..")
  171.     graph("symbol",128,47,8,16,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,1,
  172.         "Robert Alexander Schumann")
  173.     graph("symbol",150,36,4,8,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,
  174.         "ローベルト･アレクサンダー･シューマン")
  175. }
  176. KOK_B02 {
  177.     graph("boxf",20,5,450,63,PSET,C_HBLUE)
  178.     graph("symbol",91,5,4,8,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,"いま") 
  179.     graph("symbol",196,5,4,8,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,1,"と　き") 
  180.     graph("symbol",92,16,8,16,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,
  181.         "今 やさしい瞬間")
  182. }
  183. KOK_B03 {
  184.     graph("symbol",305,36,4,8,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,"そば")
  185.     graph("symbol",162,47,8,16,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,
  186.         "わたしはあなたの側にいて")
  187. }
  188. KOK_B04 {
  189.     clr_u;
  190.     graph("symbol",209,5,4,8,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,"こえ")
  191.     graph("symbol",92,16,8,16,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,
  192.         "ほら ささやく声")
  193. }
  194. KOK_B05 {
  195.     clr_d;
  196.     graph("symbol",251,36,4,8,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,"つた")
  197.     graph("symbol",162,47,8,16,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,
  198.         "ぬくもりが伝わるでしょう")
  199. }
  200. KOK_B06 {
  201.     clr_u;
  202.     graph("symbol",209,5,4,8,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,1,"むね")
  203.     graph("symbol",92,16,8,16,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,
  204.         "この ときめく胸")
  205. }
  206. KOK_B07 {
  207.     clr_d;
  208.     graph("symbol",147,36,4,8,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,"こども")
  209.     graph("symbol",144,47,8,16,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,
  210.         "子供にかえってはしゃいでる")
  211. }
  212. KOK_B08 {
  213.     clr_u;
  214.     graph("symbol",214,5,4,8,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,"め")
  215.     graph("symbol",92,16,8,16,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,
  216.         "ほら みつめる瞳が")
  217. }
  218. KOK_B09 {
  219.     clr_d;
  220.     graph("symbol",161,36,4,8,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,"まぶ")
  221.     graph("symbol",238,36,4,8,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,"め")
  222.     graph("symbol",162,47,8,16,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,
  223.         "眩しくて瞳をそらしそうよ")
  224. }
  225. KOK_B10 {
  226.     clr_u;
  227.     graph("symbol",91,5,4,8,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,"とき")
  228.     graph("symbol",92,16,8,16,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,
  229.         "時 このままずっと")
  230. }
  231.  
  232. KOK_B11 {
  233.     clr_d;
  234.     graph("symbol",179,36,4,8,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,"なが")
  235.     graph("symbol",180,47,8,16,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,
  236.         "流れていかずにいて")
  237. }
  238. KOK_B12 {
  239.     clr_u;
  240.     graph("symbol",141,5,4,8,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,"こども")
  241.     graph("symbol",92,16,8,16,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,
  242.         "ほら 子供のように")
  243. }
  244. KOK_B13 {
  245.     clr_d;
  246.     graph("symbol",233,36,4,8,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,"うで")
  247.     graph("symbol",162,47,8,16,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,
  248.         "あなたの腕に抱かれて")
  249. }
  250. KOK_B14 {
  251.     clr_u;
  252.     graph("symbol",91,5,4,8,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,"ゆめ")
  253.     graph("symbol",92,16,8,16,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,
  254.         "夢 みているような")
  255. }
  256. KOK_B15 {
  257.     clr_d;
  258.     graph("symbol",165,36,4,8,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,"すてき")
  259.     graph("symbol",287,36,4,8,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,"かん")
  260.     graph("symbol",162,47,8,16,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,
  261.         "素敵なときめき感じてる")
  262. }
  263. KOK_B16 {
  264.     clr_u;
  265.     graph("symbol",214,5,4,8,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,1,"と　き")
  266.     graph("symbol",92,16,8,16,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,
  267.         "この きらめく瞬間 ")
  268. }
  269. KOK_B17 {
  270.     clr_d;
  271.     graph("symbol",108,47,8,16,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,
  272.         "いつまでもこのままこのままふたり")
  273. }
  274. KOK_B18 {
  275.     clr_u;
  276.     graph("symbol",49,16,8,16,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2,
  277.         "☆★☆ Ｓｐｅｃｉａｌ Ｔｈａｎｋｓ ☆★☆")
  278. }
  279. KOK_B19 {
  280.     clr_d;
  281.     graph("symbol",191,47,8,16,OPAQUE,C_HWHITE,C_HBLUE,0,0,0,2, "Ηεινζ" )
  282. }
  283. KOK_B20 {
  284.     graph("symbol",185,30,8,16,OPAQUE,C_HWHITE,C_HBLUE,2,0,0,2, "Ｅｎｄｅ" )
  285. }
  286.  
  287. clr_u {
  288.     graph("boxf",20,5,450,32,PSET,C_HBLUE)
  289. }
  290. clr_d {
  291.     graph("boxf",20,36,450,63,PSET,C_HBLUE)
  292. }
  293.  
  294. CHGXY {
  295.     switch_run( TOTAL,     0, "return (-1);",
  296.                          288, "COLOR_1;",
  297.                         1824, "COLOR_2;",
  298.                         3408, "COLOR_3;",
  299.                         4896, "COLOR_4;",
  300.                         6480, "COLOR_5;",
  301.                         7968, "COLOR_6;",
  302.                         9552, "COLOR_7;",
  303.                        11040, "COLOR_8;",
  304.                        12700, "COLOR_9;"
  305.                )
  306. }
  307.  
  308. COLOR_1 {
  309.     if ( TOTAL < 620 )
  310.     {    col_now = 288;
  311.         SW_FLG = -1;
  312.         S_XB = 91;
  313.         S_YB = 5;
  314.         S_XWB = 29;
  315.         col_next = 590;    /* 今  */
  316.     } else if ( TOTAL < 870 )
  317.     {    col_now = 605
  318.         S_XB = 120;
  319.         S_YB = 5;
  320.         S_XWB =97;
  321.         col_next = 860;    /* やさしい瞬(間)7 */
  322.     } else if ( TOTAL < 1000 )
  323.     {    col_now = 850;
  324.         S_XB = 214;
  325.         S_YB = 5;
  326.         S_XWB = 18;
  327.         col_next = 980;    /* 間 */
  328.     } else if ( TOTAL < 1430 )
  329.     {    col_now = 1000;
  330.         S_XB = 162;
  331.         S_YB = 36;
  332.         S_XWB = 146;
  333.         col_next =1425 ;    /* わたしはあなたの */
  334.     } else if ( TOTAL < 1530 )
  335.     {    col_now = 1430;
  336.         S_XB = 305;
  337.         S_YB = 36;
  338.         S_XWB = 20;
  339.         col_next = 1525;    /* 側 */
  340.     } else if ( TOTAL < 1638 )
  341.     {    col_now = 1530;
  342.         S_XB = 322;
  343.         S_YB = 36;
  344.         S_XWB = 52;
  345.         col_next = 1638;    /* にい(て)8 */
  346.     } else if ( TOTAL < 1820 )
  347.     {    col_now = 1632;
  348.         S_XB = 362;
  349.         S_YB = 36;
  350.         S_XWB = 22;
  351.         col_next = 1750;    /* て */
  352.     }
  353. }
  354.  
  355. COLOR_2 {
  356.     if ( TOTAL < 2155 )
  357.     {    col_now = 1820;
  358.         S_XB = 92;
  359.         S_YB = 5;
  360.         S_XWB = 36;
  361.         col_next = 2020;    /* ほら  */
  362.     } else if ( TOTAL < 2350 )
  363.     {    col_now = 2140;
  364.         S_XB = 138;
  365.         S_YB = 5;
  366.         S_XWB = 71;
  367.         col_next = 2345;    /* ささやく */
  368.     } else if ( TOTAL < 2544 )
  369.     {    col_now = 2350;
  370.         S_XB = 208;
  371.         S_YB = 5;
  372.         S_XWB = 25;
  373.         col_next = 2520;    /* 声 */
  374.     } else if ( TOTAL < 2780 )
  375.     {    col_now = 2544;
  376.         S_XB = 162;
  377.         S_YB = 36;
  378.         S_XWB = 89;
  379.         col_next = 2760;    /* ぬくもりが */
  380.     } else if ( TOTAL < 2870 )
  381.     {    col_now = 2780;
  382.         S_XB = 249;
  383.         S_YB = 36;
  384.         S_XWB = 25;
  385.         col_next = 2870;    /* 伝 */
  386.     } else if ( TOTAL < 3015 )
  387.     {    S_XB = 270;
  388.         S_YB = 36;
  389.         S_XWB = 18;
  390.         col_next = 3000;    /* わ */
  391.     } else if ( TOTAL < 3065 )
  392.     {    col_now = 3015;
  393.         S_XB = 287;
  394.         S_YB = 36;
  395.         S_XWB = 22;
  396.         col_next = 3065;    /* る */
  397.     } else if ( TOTAL < 3390 )
  398.     {    S_XB = 303;
  399.         S_YB = 36;
  400.         S_XWB = 73;
  401.         col_next = 3300;    /* でしょう */
  402.     }
  403. }
  404.  
  405. COLOR_3 {
  406.     if ( TOTAL < 3690 )
  407.         {    col_now = 3390;
  408.         S_XB = 92;
  409.         S_YB = 5;
  410.         S_XWB = 36;
  411.         col_next = 3520;    /* この  */
  412.     } else if ( TOTAL < 3888 )
  413.     {    col_now = 3696;
  414.         S_XB = 138;
  415.         S_YB = 5;
  416.         S_XWB = 71;
  417.         col_next = 3870;    /* ときめく */
  418.     } else if ( TOTAL < 4128 )
  419.     {    S_XB = 209;
  420.         S_YB = 5;
  421.         S_XWB = 19;
  422.         col_next = 4020;    /* 胸 */
  423.     } else if ( TOTAL < 4272 )
  424.     {    col_now = 4120;
  425.         S_XB = 144;
  426.         S_YB = 36;
  427.         S_XWB = 38;
  428.         col_next = 4270;    /* 子供 */
  429.     } else if ( TOTAL < 4560 )
  430.     {    S_XB = 180;
  431.         S_YB = 36;
  432.         S_XWB = 108;
  433.         col_next = 4550;    /* にかえっては */
  434.     } else if ( TOTAL < 4600 )
  435.     {    S_XB = 286;
  436.         S_YB = 36;
  437.         S_XWB = 44;
  438.         col_next = 4590;    /* しゃ */
  439.     } else if ( TOTAL < 4700 )
  440.     {    col_now = 4600;
  441.         S_XB = 320;
  442.         S_YB = 36;
  443.         S_XWB = 47;
  444.         col_next = 4710;    /* いで(る)5 */
  445.     } else if ( TOTAL < 4890 )
  446.     {    col_now = 4700;
  447.         S_XB = 361;
  448.         S_YB = 36;
  449.         S_XWB = 22;
  450.         col_next = 4890;    /* る */
  451.     }
  452. }
  453.  
  454. COLOR_4 {
  455.     if ( TOTAL < 5230 )
  456.     {    S_XB = 92;
  457.         S_YB = 5;
  458.         S_XWB = 46;
  459.         col_next = 5100;    /* ほら  */
  460.     } else if ( TOTAL < 5480 )
  461.     {    col_now = 5232;
  462.         S_XB = 138;
  463.         S_YB = 5;
  464.         S_XWB = 120;
  465.         col_next = 5480;    /* みつめる瞳(が)8 */
  466.     } else if ( TOTAL < 5610 )
  467.     {    S_XB = 230;
  468.         S_YB = 5;
  469.         S_XWB = 20;
  470.         col_next = 5610;    /* が */
  471.     } else if ( TOTAL < 5708 )
  472.     {    S_XB = 161;
  473.         S_YB = 36;
  474.         S_XWB = 22;
  475.         col_next = 5708;    /* 眩 */
  476.     } else if ( TOTAL < 5960 )
  477.     {    S_XB = 179;
  478.         S_YB = 36;
  479.         S_XWB = 98;
  480.         col_next = 5960;    /* しくて瞳を(そ)5 */
  481.     } else if ( TOTAL < 6085 )
  482.     {    S_XB = 271;
  483.         S_YB = 36;
  484.         S_XWB = 18;
  485.         col_next = 6080;    /* そ */
  486.     } else if ( TOTAL < 6144 )
  487.     {    col_now = 6085;
  488.         S_XB = 288;
  489.         S_YB = 36;
  490.         S_XWB = 18;
  491.         col_next = 6140;    /* ら */
  492.     } else if ( TOTAL < 6460 )
  493.     {    S_XB = 306;
  494.         S_YB = 36;
  495.         S_XWB = 72;
  496.         col_next = 6400;    /* しそうよ */
  497.     }
  498. }
  499.  
  500. COLOR_5 {
  501.     if ( TOTAL < 6760 )
  502.     {    col_now = 6480;
  503.         S_XB = 91;
  504.         S_YB = 5;
  505.         S_XWB = 29;
  506.         col_next = 6740;    /* 時  */
  507.     } else if ( TOTAL < 6940 )
  508.     {    col_now = 6760;
  509.         S_XB = 120;
  510.         S_YB = 5;
  511.         S_XWB = 74;
  512.         col_next = 6930;    /* このまま */
  513.     } else if ( TOTAL < 7010 )
  514.     {    col_now = 6940;
  515.         S_XB = 191;
  516.         S_YB = 5;
  517.         S_XWB = 44;
  518.         col_next = 7010;    /* ずっ(と)5 */
  519.     } else if ( TOTAL < 7190 )
  520.     {    S_XB = 230a;
  521.         S_YB = 5;
  522.         S_XWB = 20;
  523.         col_next = 7150;    /* と */
  524.     } else if ( TOTAL < 7290 )
  525.     {    col_now = 7190;
  526.         S_XB = 179;
  527.         S_YB = 36;
  528.         S_XWB = 20;
  529.         col_next = 7290;    /* 流 */
  530.     } else if ( TOTAL < 7500 )
  531.     {    S_XB = 195;
  532.         S_YB = 36;
  533.         S_XWB = 80;
  534.         col_next = 7500;    /* れていか(ず)5 */
  535.     } else if ( TOTAL < 7630 )
  536.     {    S_XB = 270;
  537.         S_YB = 36;
  538.         S_XWB = 20;
  539.         col_next = 7630;    /* ず */
  540.     } else if ( TOTAL < 7678 )
  541.     {    S_XB = 287;
  542.         S_YB = 36;
  543.         S_XWB = 24;
  544.         col_next = 7680;    /* に */
  545.     } else if ( TOTAL < 8010 )
  546.     {    S_XB = 306;
  547.         S_YB = 36;
  548.         S_XWB = 36;
  549.         col_next = 7950;    /* いて */八分休符
  550.     }
  551. }
  552.  
  553. COLOR_6 {
  554.     if ( TOTAL < 8390 )
  555.     {    col_now = 8016;
  556.         S_XB = 92;
  557.         S_YB = 5;
  558.         S_XWB = 46;
  559.         col_next = 8320;    /* ほら  */
  560.     } else if ( TOTAL < 8440 )
  561.     {    col_now = 8390;
  562.         S_XB = 138;
  563.         S_YB = 5;
  564.         S_XWB = 40;
  565.         col_next = 8450;    /* 子供 */
  566.     } else if ( TOTAL < 8550 )
  567.     {    S_XB = 174;
  568.         S_YB = 5;
  569.         S_XWB = 60;
  570.         col_next = 8550;    /* のよう(に)5 */
  571.     } else if ( TOTAL < 8732 )
  572.     {    S_XB = 229;
  573.         S_YB = 5;
  574.         S_XWB = 20;
  575.         col_next = 8732;    /* に */
  576.     } else if ( TOTAL < 8920 )
  577.     {    S_XB = 162;
  578.         S_YB = 36;
  579.         S_XWB = 73;
  580.         col_next = 8920;    /* あなたの */
  581.     } else if ( TOTAL < 9045 )
  582.     {    S_XB = 230;
  583.         S_YB = 36;
  584.         S_XWB = 27;
  585.         col_next = 9045;    /* 腕(に)4 */
  586.     } else if ( TOTAL < 9165 )
  587.     {    S_XB = 252;
  588.         S_YB = 36;
  589.         S_XWB = 20;
  590.         col_next = 9165;    /* に */
  591.     } else if ( TOTAL < 9210 )
  592.     {    S_XB = 268;
  593.         S_YB = 36;
  594.         S_XWB = 24;
  595.         col_next = 9210;    /* 抱 */
  596.     } else if ( TOTAL < 9500 )
  597.     {    S_XB = 286;
  598.         S_YB = 36;
  599.         S_XWB = 38;
  600.         col_next =9480 ;    /* かれ */
  601.     } else if ( TOTAL < 9550 )
  602.     {    S_XB = 322;
  603.         S_YB = 36;
  604.         S_XWB = 20;
  605.         col_next = 9530;    /* て */
  606.     }
  607. }
  608.  
  609. COLOR_7 {
  610.     if ( TOTAL < 9830 )
  611.     {    col_now = 9550;
  612.         S_XB = 91;
  613.         S_YB = 5;
  614.         S_XWB = 29;
  615.         col_next = 9750;    /* 夢  */
  616.     } else if ( TOTAL < 10025 )
  617.     {    col_now = 9840;
  618.         S_XB = 120;
  619.         S_YB = 5;
  620.         S_XWB = 74;
  621.         col_next = 10025;    /* みている */
  622.     } else if ( TOTAL < 10080 )
  623.     {    S_XB = 192;
  624.         S_YB = 5;
  625.         S_XWB = 42;
  626.         col_next = 10080;    /* よう(な)4 */
  627.     } else if ( TOTAL < 10270 )
  628.     {    S_XB = 228;
  629.         S_YB = 5;
  630.         S_XWB = 20;
  631.         col_next = 10265;    /* な */
  632.     } else if ( TOTAL < 10410 )
  633.     {    col_now = 10270;
  634.         S_XB = 162;
  635.         S_YB = 36;
  636.         S_XWB = 39;
  637.         col_next = 10410;    /* 素敵 */
  638.     } else if ( TOTAL < 10650 )
  639.     {    S_XB = 198;
  640.         S_YB = 36;
  641.         S_XWB = 90;
  642.         col_next = 10650;     /* なときめき */
  643.     } else if ( TOTAL < 10750 )
  644.     {    S_XB = 285;
  645.         S_YB = 36;
  646.         S_XWB = 23;
  647.         col_next = 10750;    /* 感 */
  648.     } else if ( TOTAL < 10860 )
  649.     {    S_XB = 303;
  650.         S_YB = 36;
  651.         S_XWB = 43;
  652.         col_next = 10860;    /* じて(る)5 */
  653.     } else if ( TOTAL < 11030 )
  654.     {    S_XB = 345;
  655.         S_YB = 36;
  656.         S_XWB = 18;
  657.         col_next = 11000;    /* る */
  658.     }
  659. }
  660.  
  661. COLOR_8 {
  662.     if ( TOTAL < 11376 )
  663.     {    col_now = 11035;
  664.         S_XB = 92;
  665.         S_YB = 5;
  666.         S_XWB = 46;
  667.         col_next = 11300;    /* この  */
  668.     } else if ( TOTAL < 11625 )
  669.     {    col_now = 11370;
  670.         S_XB = 138;
  671.         S_YB = 5;
  672.         S_XWB = 96;
  673.         col_next = 11600;    /* きらめく瞬(間)5 */
  674.     } else if ( TOTAL < 11750 )
  675.     {    col_now = 11625;
  676.         S_XB = 230;
  677.         S_YB = 5;
  678.         S_XWB = 18;
  679.         col_next = 11700;    /* 間 */
  680.     } else if ( TOTAL < 12480 )
  681.     {    col_now = 11755;
  682.         S_XB = 108;
  683.         S_YB = 36;
  684.         S_XWB = 250;
  685.         col_next = 12420;    /* いつまでもこのままこのままふ */
  686.     } else if ( TOTAL < 12560 )
  687.     {    col_now = 12430;
  688.         S_XB = 335;
  689.         S_YB = 36;
  690.         S_XWB = 40;
  691.         col_next = 12560;    /* たり */
  692.     }
  693. }
  694.  
  695. COLOR_9 {
  696.     if ( TOTAL < 12910 )
  697.     {    SW_FLG = 0;
  698.         col_now = 12750;
  699.         S_XB = 49;
  700.         S_YB = 16;
  701.         S_XWB = 190;
  702.         B_XB = 421;
  703.         B_XWB = -190;
  704.         S_YW = 48;
  705.         col_next = 12900; /* すぺしぁるさんくす＆Ηεινζ(消去) */
  706.     }
  707. }
  708.